5 REM ** REACTION TEST 3 **
10 A=RND(-TI):POKE 53280,5:POKE 53281,11
20 POKE 214,5:PRINT:POKE 211,6
30 PRINT"[147][155]        TEST OF REACTION TIME 3 "
35 PRINT"WHEN A LETTER APPEARS ON SCREEN, YOU"
40 PRINT"HAVE TO PRESS THAT KEY AS SOON AS       POSSIBLE"
50 PRINT""TAB(10)"THE REACTION TEST:"
60 FORT=1 TO 1500:NEXTT
70 A$=CHR$(INT(RND(0)*26)+65)
90 PRINT"FIND THIS KEY:  ";
100 FORT=1 TO INT(5000*RND(1))+500:NEXTT
110 PRINT A$:TI$="000000"
120 GETR$:IF R$="" THEN 120
130 IF R$<>A$ THEN 120
140 T=TI/60
150 PRINT"YOU TOOK";T;"SECONDS"
160 GOSUB 200
170 FORT=1 TO 500:NEXTT
175 PRINT"DO YOU WANT 'NOTHER GO???"
180 GET Z$:IF Z$="Y" THEN 20
185 IF Z$<>"N"THEN 180
190 FORT=1 TO 500:NEXT:LOAD"THE MAIN MENU/BM",8,1
200 IF T<=.55 THEN PRINT"BLOODY HELL! IT'S SUPERMAN!":RETURN
205 IF T<=.8 THEN PRINT"EXCELLENT REACTIONS!":RETURN
210 IF T<1.3 THEN PRINT"PRETTY GOOD!":RETURN
220 IF T<1.8 THEN PRINT"NOT BAD":RETURN
230 IF T<2.3 THEN PRINT"GETTING A BIT SLOW!":RETURN
240 PRINT"YOU'VE GOT GREAT REACTIONS..."
245 FORT=1 TO 1000:NEXT
250 PRINT"FOR A SNAIL!!!!!!!!":RETURN